27700	416	CALL LINES(R3Q,RD,L)
27800		IF(J7.EQ.1)GO TO 412
27900	C  JUMP FOR VERTICAL DASH
28000		IF(R3Q.GE.RA)GO TO 413
28100	C  JUMP IF ALL DONE
28200		R3Q=R3Q+RJ
28300	414	CALL EXCH(L,K)
28400		GO TO 416
28500	412	IF(RD.GE.RA)GO TO 413
28600	C  JUMP IF DONE
28700		RD=RD+RJ
28800		GO TO 414
28900	413	IF(J10.LE.0)RETURN
29000	C  NEXT FOR THICK DASHES
29100		J10=J10-1
29200		IF(J7.EQ.1)GO TO 415
29300		R3Q=RJX
29400		RD=RD+1./DIS
29500		GO TO 41
29600	415	R3Q=R3Q+1./DIS
29700		RD=RJY
29800		GO TO 41
29900	
30000	
30100	407	RX=RD+POS